M.BASIC and MDDS 

number in Chapte 



EDIT <linenumber> 
(SPACE) 

C<new character > 
D 

Knew characters) 
L 

8<character> 
K<character> 
IRETURH) 
Q 



w.aAJwc cti»*A«Txj,roa Wa-riwo Ano w^wtwo 



_^ — Sam 

PRpflRMM 



Bnter edit. coaakand mode 

Advance the adit pointer 

Changs the naxt character in the edit buffer 

Delate the next character 

Insert new characters into the line 

List the line in the special editing buffer 

Search to a specified character 

Delete to a specified character 

Replace line in file and exit edit and* 

Quit the edit »odei leave original line unchanged 



RBNUM {<starting no.>) Hin«remenfc»} (<start line>] Renumber file lines 

'MERGE "[<unit>tl<flle>name>* Merge program on disk line by line into current file 

DELETE f (<linahumber>]-[<linenumber>]) Delete lines frost current program 

LIS* (l«linan«mber>l-t<linenumb#rii) Display some or all of current program 

RUN Execute program currently in program" buffer 

(control- )C Interrupt a running program 

c °a, „ . ■, l | l ,.,„ ^ . . ffyfcf,"** 8 «^^ n g«n,,a^iff««^.itei«wi, 



..n> 



I-)<n. 
(-]<». ..n.n. .. 
"<charactere>" 
<ona. letter>% 
<oa« letter>$ 



Integer forma 

> Real format 9 

String format to 

Integer variable to 

string yar|afefo 



AWP VAWtABUSB 



4.3 

4.6 

4.6 

ft 

7 



[-|<«xltn...n> 

t-I <n. . .n.n. . ,nB(-]xx 



Integer in 



Scientific format 



+ Addition 
\ Integer division 
< Leas than 
<- Less than 
or equal to 
logical AH& 



~ SubtraaiioiC 



O fr"^* ** 



Exponentiation 
Greater than 
Creator thin or 
equal to 



* Multiplication 

+ String concatenation 

* Equal to 

<> Hot equal to , 



Gre 



x and y at 

ABS(x> 

COS(x) 

FIX<x> 

IOT(x) 

L0G(x) 

!*IW<x,y> 

Rtffifx) 

SIH(x) 

vmM 



and for numeric . exp ! *ee%'is$ftjti 

Mao-lute *(*!«* 

Cosine of angle in radiane 

Truncate rr-actetohall-i'jiMt- 

atest integer not greater ^i*,n 

logarithm to Base io 

Le*«*r of tho i>wo valines 

Random number using x is seed 

Sine of angle in radians 

*&<m%P it,, 




••mix) 

ixp(x) 

frac(x) 
*H(xj 

m*X(x,y) 
SSN(x) 

sfcRfxi 



Arctangent in radivna 

Exponent iafcid* 

Fractional part 

Logarithm to 'oaee a 

Greatest of the toetf .vaiilea 

x nod\ii% y 

♦ 1 if poa., -1 if rteg.> 8 if 

Squire Root 



x, y and n stand for numeric dkjjtei'tioia * 
ASCfxS) ASCII code of first oHai. irt>" ft 
CHARS (x) Character whose ASCII code Is x 
PHT(x,yS) Give x as a string modeling y$ 
NOH PRINTING CHARACTERS IN y*i 

9 digiti leading O's became *«*'S 
Z digiti leading 0' a become blanks 
V decimal point location 
$ digit) print $ where appropriate 
* digit, leading O's become **»»s 
, gives a blank, *» or $ as ndidei 
iHDBX(x»»y$) Position In x$ o| 



^fWrfll,, ,,.- .,,,,- ;„;,/ 

x$ and y$ stand for string expressions, 

LBFTS(xS,n) n leftmost characters of iS 

EiSN(x$) Length of « 

rilD$(x$,n,tyn y char's of x4 beg a*t rt'fch 

*AX(x$,y$) The greats* (by A*3IJ cod*) 

MMt(x$,yS) The lesser (by ASCli code) 

RBPEAT$(x$,n> xS repeated h ttaws 

RIStiTi(X*,n) n rightmost characters of x9 

8TR$(n) n converted to a string 

VAt. (x$) xj converted to di ftumWr 

V««rT(*i,y»> Pos of first eftar ftdk In y» 



IH(x> 
PEE*(x> 



Input from t/& twikt-x 
Contents of memory i'6cafc#on x 



iMHilZE Size of current program in b^tet 
9FACiIiEPT Bytes l«ft in prog*a« buffer 



<one letter>[<one digit>] Real variable 14 



TTMIJeT" 



is 






M 



W.EAaffC ETOTEeMEW 

>,...*' Data Eo be isl 



bATA <num«ric 6t string constant),.... Data Go be Assigned to variables by « RBaD 

DkF rlj*letter>t(<peraa*t**, riaae»)i « ^SxpressionJ User defined function 

DBF FA<letfeer> - <itklrt addrass> Assembly iang. function 

DIM <lltter>[t) (<siEe>,...<alBe>) Bites ,«Sf 1 to 4 diaensions in array <l«tter> 

OIN <letter>$ ( t<slre>, . ..) <length> ) Sires of to 4 dill's i length of string array 
BHB t sfiyaleal end of prograai file 

EXEC <strifK| expreaeion> Exeoote sta-MVj expression as a BASIC statement 

FLOW Enable trace uode ^M.mpl^ ealtt prograai line w*i*n executed) 

FOR <nua. var.> • <nua. expr.> fo <nua. expti* fsm <»iusi. expr.>) Initiate loop 

G03UB <llnenuaber> Execute subroutine 

GOTO <linenuab«r> Transfer control 

IF <logioai expreaslon> TttM <linenu«ber> Conditional transfer of control 

IF <log* expr.> [THJSM] STATBMBMT | timiMkfer&U* «%nditie«al execution of stateaients 
tHFUT t*<proe)pt>"<i or ,>] <variable> t ;variabiej . ;» Halt for Input froa console 

tun*) <var£able> - <expr«aaion> Assign value of <expreeslon> to <varlabte> 

HkMEMD <nis>erio expression) Define upper Halt of iwaaory used by H.BASIC 

timet <nuawrio variable) Wrpinalw toef *ng^t by FOR and increment counter 

MOFLGM Disable trace mode 

OH <num« axpr.> <G0#O or OOSOB> <lineno.> ( ,<llneno»>|. . .Variable transfer of control 
00T ( <port, number) ) • <num* expr> output to port 

POKE (<address>) - <num; «xpr.> Beorm in given memory address 

PRINT <expr.>(<, or r>). ..|TAB(Xnum. expr.>)(<, or i>]|... Display values 

READ <variable> (,<varlaBt*|... Oiva variables) valuets) found in DATA statement 
REM (remark text> fen^axAsdShi raiaaitk for dboumibitiation purposes 

RESTORE t<Hnems*b*r>l Position QAfA list pointer 

REwRH RatifcR from Subroutine to calling routine 

SISfB (<rsire>,<ialia>,<asir«>,[<prog;»i»e>r) Allocate number of bytes of storage 
BT§P Stoj^S p*bgrf« execution, continue with COMT 

BTMIW 'j-fctiilng dsiliiEmto^ _ nf^nf fr |to|^J|^maAaj for tMBW- and OET statements 



:!£li-*;?ri^Dt^l; 



l r.vg~ Jtsmm Bi'i a-i saaia mj^ i 



36 

37 
37 
38 
38 
38 
39 
39 
40 
42 
43 
43 
43 
44 
44 
45 
45 
45 
-45 
46 
46 
17 
49 
49 
49 
49 
50 
50 
IS. 



tkHftajp *t<Unit>t-l»«i* t^iijtiay directory of disk in drive 53 

l*m "t<unlt>tj<fllename»" Lo*J' program or object file into memory 53 

PSOKDS *(<tihit>il<tile*»aa>» toad and execute prograai file 53 

SAVE ^^tl|<unl»ytl-<*l|e»Bat4i» fc [<*( Save file on disk 54 

SCRAMS 1 *|<UBlt>U*«l!j»naat«>" Delete any file from disk 54d 

OlttH* "(<unlt>.l<filen*M>» , SiiS»l afia akacute next program ae-gmertt 54.1 

IiIRK n««Kit>i],<fiIeftam«>* :'.'£ 
PP*RH <ifcle«umbe#*'^*M«!S%^MHf*la» 1 »*^ 

twf <fl'le«umbar> (RB8»Rd <rec*num.>] .__ 

SET <fllanumber> |naWi"W *re«*nttm. <exfir-Hni-i&' 
EtBOM ■*ii.lehus»4fc> •. ,-: ", : - ¥ ' • 

ATTRS W-fil*nO»>)-6*«Bi t« rp44>)» « $*$*&& 
■OF (Xf-ilenumberx - <flle letigtH> 




toad and execute overlay file 544 

t§j||i<<li.i«e' na*>l (B««OR<ll«e no.>] 

..i-sSlij^. ji^i 1^^ jjjj. pj-ogram access 

store data on disk 
.» Set data from disk 



FRK»tFA68 <fil«njum»a» 

flUHi'iftK (:<lilenuiKbei!'> ) - <fna* (JET polMtl^ 

FWBitt (<uuammam) - *hew w« pomti 

ATfnX«r&ane>T :/iitr-H»ota paramefeti: 

ERR Error code of last disk a*feb# 

ERR* Error message of last disk error 
NAME (««llano>) tttme of the HI* 





Close file 

fj;i (■write prist j> rile attributes 

{let file lengbh parameter 

,i|ui>iiS«d fciracXs allocated k> a file 

Sit sequential (SET pointer 

Sit sequential POT pointer 

cpftftttB him of a Cile 



55 
57 
60 
60 
61 
61 
62 
62 
63 

*4 



M 




M$fWlpMmn4t'-) Val of s»q PtJt pdiiiter 

'^sVLetia») File sire in records 

IWilenoX Number of tracks 

(<flleno)> Humber of free tracks 



r>"<»f,*T,6r *«>* [F«W^* "Hrttlalalfi 1 «r linea>) [B«bPAOe<line number)] 

Open 'MbfJmt'' Wfle^oil" printer, terminal, or null device 65 

POT <filehumber> <expr>(<, or !>!#.. Output to printer or terminal 66 

CfcOSB <flienumbe»> Close file 66 

■HDPACat <filsnu»b«lr> rmmfrtiJoB uubmut devlae to top of n#xt pane 67 

A89IOH <devide |> <logid«l strsaa maak> (<widteh) {4*ail eount>J] I/O central 67 

!*BTP (!<llrt*humberivl-|<linenumb*r>l) ^ ,,. ( . : P^^^'iimi er all of durrerit proaram 69 

«*A<»ESii8E dumber 6i 1-ihid per page> ' • '\^v^Wl-".s , ll-*s or p**#aa listing pages' 69 



cokp <start blk 1> <end bik t> <s*e*fc 

DUMP <Cstart> !<en<J>] 

BMTR <start> 

P1U. <start> <end> <byte> 

MOVE taouree »tart> < source «n<B <deetination> 

SEAR <atart> <end> <byt«> 



: m* wm - 



Compare two blocks of data 

Has dump of memory 

Rnter data In memory 

Fill block at memory with a constant 

Hew • block of memory 

search a block for a particular byte 



Mw pf w g, ep 



SKAKN <start> <end> <byte? Search a block for non occurrence of a byte 
CREATK "l<unit>i )<filename>" ( <fll«type>] New directory entry is created 

MSP "(<unit>t)<fileeame>* (<reeord number)) Hex (Jimp of file on disk 

FILES i<unit>] Output formatted display of disk directory 
FRBB t<unlt>] Output the number of free traeke 

SCRATCH "|<unit>sl<filename>» Remove a named file from the disk directory 
LOAD *(<unit>i)<filename>" I «sfca-jvfc»-$ . toad a named file fro* disk 

SAVE "(<unit>il<filen«»te>" <sfcart> <tn# (<file type)) [<«x%o.addr.>J Save new file 
RENAME "(<unit>:l<filename*"' "<nev nea»>" change the name of a disk file 

WPE "(<unit>!)<fil«naaie><" <jp»!» ' <*#n?e the file type on the directory 

APP ["<ASCII>» »<ASCII>") f-jljfic? #"*»i) •transfer' pc*<ipm control to StpOO 

ASSIGN <device l> <logioal Stream, mask) |<widtta> Knull count) ]1 I/O control 

EXEC <addreas) " ' Execute object erode 

MATH <hex number) «hex numbers Do hex arithmetic 

PROMPT "<ASCII>" ShtP9B ■■k-kj prompt awinjj **>■§»> arbitrary etr-ing 
INIT <unit> |ni*i«ii«e a diskette in' the indicated unit 
ZSM "Kunit;Ml<souroefile>" "(<«|^|k.j(J.<iBjJj!^|otfile>" -<optiona>" (<offeet>) Assemble 
QPTIONSt I (only ert»e*»i) '' f ||ref4'nst#d listing) S (print listing only) 

M (memory iM#ae:) i, (delete line numbers) <T (print symbol table) 
DE«W3-XX (XX Is veifsi'*^ numb* r created by MfiUG-G*M) DEBUG utility 

BEBUG-QEN RljWG Generation utility 

blNBEDXT ' HD08 Line Editor 

!<unit>i]*»psnVI •mianem*)'' ?"'%«* •■%finf>"l Create iBOates frees synbol Table 

l<unit>i)FIUlCOPY *(<unlt>iV«f4 ( ,l«!"W»?* "I<<»it>] f«] [<*ewfilenameH* copy File 

HunitJileOWFHJ! "[<^it>4*«iieii|ii(if^* "(Jppy file to mama drive but different disk 
diskcop* copy dink «goi« one drive to another 



V*^Btffrr 



int ool>) 



CIdSAB 

HAM* ^filename)* 
FlEst 

AUTO <number> 
•PROMPT "«*easMge»-" 
LCWB *f<un.lt>:i ! )*fil<Bri«ma)* 
ftPPStiO "[<unl-t)il<filenama>? 
SAVE f<unlt>] 
'RSSAVE [<uni-fc>l 

LIST Klinemiiibar 1*1 |<linenn*»t S»| 
LISTP ( Clinenuabei 1>.) itmnenumbajr 2»J 
PRIIfr (<-llnenamber 1>1 'Klinenumber 3>| 
PRIIftP :(<linenumber1>] (<line«umber 2»J 
TAB l*op code eol>] (<operand eol>) I<i 
DEW <ilnenumber i> {<linenumber p\ 
REHW* K starting' no. »1 ^increment)) (<start line>] 
SEARCH [<llnenuab«r 1>] '{Clineni»ber 2>] 
SIARCMAU, Klinenumber 1>) (<linenu<pber 2>t 
CHANGE t<linenuau>er 1>] (<linenuaber 2>] 
CMAMGBAU. ( <llne number t>] [<linenua|ber 2>] 
EDIT <linenu*iber> 

(SPACE) 

C<nevr character) 



Knew character »> 

L 

S<ohar»oter> 

K<charact»r> 

(RBTORM) 

a 



Clear file text trim wm&pf 

Naae the current text file. 

-Display all file paraawtsrs 

Set the auto llnenuaber increswnt 

Chenge the proept string 

Load a text file into Nsaory 

Qoncateitate a file to the existing file 

Save the current file on disk 

Save an old file on disk 

Output a formatted display 

Output formatted display to printer 

Output unformatted display 

Output unformatted di«play-*o-<t>rinter 



U06 



Set tabs for formatted output 
Delete lines feom file 
Renumber file lines 
Invoke search Mode using mask 
Search comment lines also 
Global sea rah and replace 
As above including comments 
Enter edit command mode 
Advance the edit pointer 
Shanoa the next character in the edit buffer 
Delete the next character 
Insert new characters into the line 
List the line in the special editing buffer 
Search to a Sjpeoified character 
Delete to a specified character 
Replace line in file and exit edit mode 
Suit the edit mode i leave original line unchanged 
Exit from the line editor and return to WbOS 



GRS Sat the value of the assembler program "covin ter to the value of the operand 

LIHK' •'< source file>* Permits additional source files to be- linked from the disk 

SHD Kexecutlon address>] Identifies the physical end of the source file 

■QU <value> Equates a literal value to the lino's label 

m& ('<.pra«f»t>'] Inputs a numeric argument from the console keyboard 

PUT t*<text>*l , (<expression>), .. . Displays given information on console 

TAB (<ep code ool>] (<operand col>] (<comnent col>] Set tabs for formatted output 

NUST Suppresses the listing of the aaseably from here o>i 

LIST Enable listing to the printer as it is encountered 

FORM Produce a form feed in the listing when encountered 

DB <byte>, l<byte> J , . . . Define storage with operands evaluating to one byte 

Z Sane as DB 

OH <word>, Kword>] , • .. Define storage byte pairs in low/high sequence 

DD <wojrS> , . . . As above except in high/low sequence 

Pt " .''•t*$^$> , Define a line of text containing any ASCII literal characters 

D9S '* <4text> ' Define a line of t^xt as above except terminated in zero 

• OTH 'MfcexW As BIT (fxoapt the last byte is ORed with 80H 

-pS <e)(presBion evaluating to 16 bita> Reserve 'sfco^age for arbitrary number of bytes 
FILL <0 bit expression), <8 bit exp.> Fill locations with the second argument 

•IFF" •<4pe»and> Conditional assembly of a bl'ook of code if the argument is zero 

IFT <opet<and> Same as above except if the argument is nonzero 

Define th» e^nd of a janditlona,! assembly block (can be nested) 



Kft i f , 



A 'Ar'ejlpijiht error 
L'lia^ei error 
R ' Regl s|;er er ror 
V-Vafee'e.jcr-or 



jm 



D Duplioate lifcef 

H Hissing .label error 

S Syntax error 



J Jump relative error 

O Opcode error 

U Undefined symbol error 



ASSKMgLBR 



+^ - Arithmetic difference * Arithmetic product 

/ ; Iivtfiae> quotient » Integer remainder & Bitwise logical AKD 

I Bl*l*tse logical OR I Bitwise logiual BXOLUSIVE-OR 
> <QW8»aDd> RiBht rotatio n al operator < <op»rand> Left rotational operator 



^wog^ nm wmp 



00-OJ Nb©S i BASIC data files 

B4-oT'«ditor/Asse«bler source files 

0S - 0H Assembler object £ BASIC *aave memory" 

IXN4F-. Executable overlay files 

IOkIJ BASIC program files 

14*417 Executable system 'files 

IS^IB sxeoutable user fa?les 

1C-7F Reserved for future expansion 

BCNfTfoVai latere for user ^gfinltiQIV 



b4smHDG 

~M£E$B£L. 



files 

Protect Status (LS 2 bits): 
0-Read^«frite Pile 
1 -Re ad Only File 
2-Permenent Read/Write File 
3??fp»anent Read Only File 



eoMPf DWPj EHTRi FILL] MOVE* SlARi !»*AWI| MaIMt 'MkBC 
|jX8T"«*tart addr.> <end addr.> 

s«BR 

-<r«o#B*jsr name> <hex v«iue> 

REGIS«SR NAMESj A, B, C, D, E, H, L, BC, DE 
FZl FMli FCilfHCl FP| FMr FPEl FFO p PHi FHH 
RSV < vector number) 
SET breakpoint number > <address> 
DISB 

OLR (<break|K>int number)) 
EXEC .(start addr.> Execute program but return to DEBUG when "breakpoint is reached 

RltPT <brefkpt. number) <repeat count> Execute until breakpt. is hit <count> tiiei 
COHT (Xbreakt>f<break2>I<break3>(<bre*k4>in 1 Execute * display state at up to 4 pti 
RET Execute s display state at breakpt. on top of atacl 

(SPACE) Execute next instruction only, and display proc. atat< 

TRACE Execute program and display proc. state after each lntructioi 



Same as in MOOS Executive 

List in instruction mnononlca 

Display processor state 

Set value of register 

HL, SP, PC, CSP (top of stack) 

<8et or reset processor flag 

Change restart vector 

Define a permanent breakpoint 

Display all current breakpoint! 

" Clear one or all breakpoint! 



